# -*- mode: snippet -*-
# name: function input
# key: rfun
# --
${1:name} <- function(${2:args}) {
  `yas/selected-text`$0
}
